--[[ 编码: WMS-01-03 名称: 容器-删除后 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: AfterDataObjDelete 功能: -- 删除【Container_Good 】 -- 删除【CG_Detail】 更改记录: V2.0 HAN 2024-8-24 -- 新增对【Container_Cell】的删除 --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- step1 获取容器编码 nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_CODE" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local cntr_code = obj_attrs[1].value -- 容器编码 -- 删除和容器相关的【容器货品】【容器货品】【容器料格】 if ( cntr_code ~= '') then local strCondition = "S_CNTR_CODE = '" .. cntr_code .."'" nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Container_Good", strCondition) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【Container_Good】失败!"..strRetInfo) end nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "CG_Detail", strCondition) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【CG_Detail】失败!"..strRetInfo) end -- V2.0 nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Container_Cell", strCondition) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【CG_Detail】失败!"..strRetInfo) end end end